home *** CD-ROM | disk | FTP | other *** search
/ Mobiclic 47 / MOBICLIC 47.ISO / mac / DATA / COMMUNS / MOBICLIC_MENUS.CST / 00074_Script_GESTION_COIN_VERT_STANDARD < prev    next >
Text File  |  2002-09-19  |  1KB  |  48 lines
  1. global validMHD, menusActifs, menuOuvert, pisteMenuHD, pisteCoinHD, ouvreMenuHD, fermeMenuHD, menuFermeHD
  2. global gFlagMagic, gFlag_hideWindows
  3. ------------------------------
  4. on beginSprite
  5.   pisteCoinHD = the currentSpriteNum
  6. end
  7. ----------------------------------
  8. on mouseUp
  9.   if the pauseState = 1 then exit
  10.   case(gFlagMagic) of
  11.     0, VOID:--Θquerres Bernard
  12.       if menusActifs=1 and menuOuvert=0 then
  13.         cursor 280
  14.         ouvreMenuHD=1
  15.         menuFermeHD=0
  16.         sprite(pisteMenuHD).memberNum = member("menuHD").number
  17.         sprite(pisteMenuHD).rect = rect(542,0,640,450)
  18.         afficherPistes pisteMenuHD
  19.         updateStage
  20.         menuOuvert = "HD"
  21.         hide_zevideo()
  22.         if gFlag_hideWindows <> VOID then hide_window()
  23.         put "  Ouverture Θquerre Verte"
  24.       end if
  25.     1:--Θquerres JLM
  26.       cursor 280
  27.       manage_magicWindow("GREEN","STD")
  28.       put "  Ouverture Θquerre magique Verte" 
  29.   end case
  30. end
  31. -------------------------
  32. on mouseEnter
  33.   if menusActifs=1 then
  34.     equerre pisteCoinHD
  35.   end if
  36. end
  37. ---------------------------
  38. on mouseLeave
  39.   if the pauseState=0 then
  40.     if rollOver(pisteMenuHD)=0 then
  41.       cursor -1
  42.       menuOuvert = 0
  43.       fermeMenuHD=1
  44.     end if
  45.   end if
  46. end
  47. ----------------------------
  48.